home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2002 January / january_2002.iso / Piposh Special / Piposh / FRITZ1.DXR / 00249.ls < prev    next >
Encoding:
Text File  |  2004-12-06  |  526 b   |  18 lines
  1. on exitFrame
  2.   global advance, mnv, ppl
  3.   if getAt(mnv, 1) > 1 then
  4.     set the memberNum of sprite getAt(ppl, 1) to member(the memberNum of sprite getAt(ppl, 1) + 1, 2)
  5.     setAt(mnv, 1, getAt(mnv, 1) - 1)
  6.   else
  7.     set the member of sprite getAt(ppl, 1) to member(1, 2)
  8.   end if
  9.   if advance < 12 then
  10.     foemov(43, 44, 60, 65, 66, 13, 7, 2, 2, 1, 12, 4)
  11.     foemov(162, 163, 175, 180, 181, 16, 7, 3, 3, 2, 11, 6)
  12.     foemov(162, 163, 175, 180, 181, 8, 3, 4, 4, 3, 11, 6)
  13.     strata2(3)
  14.   else
  15.     strata2(3)
  16.   end if
  17. end
  18.